perm filename LOSS.LAP[MAC,LSP] blob sn#659293 filedate 1982-05-18 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00003 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002
C00003 00003	
C00004 ENDMK
CāŠ—;

'(THIS IS THE LAP FOR ((DSK (MAC LSP)) LOSS /1)) 
'(COMPILED BY LISP COMPILER /936 COMAUX /25 PHAS1 /84 MAKLAP /80 INITIA /117) 

;COMPILED ON MAY 18, 1982, AT 11:43 AM

(COMMENT ****  FOO Undeclared - taken as SPECIAL in function BAZ)
(LAP BAZ SUBR) 
(ARGS BAZ (()  . 0)) 
(MOVEI 1 '(FEATURES PAGING)) 
(CALL 17 'STATUS) 
(JUMPE 1 G0002) 
(MOVEI 1 '3) 
(MOVEM 1 (SPECIAL FOO)) 
G0002 
(POPJ P) 
()